home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
CRS
/
crs10.d81
/
dark88-4.sfx
/
equates.a1
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1990-02-12
|
3KB
|
133 lines
1000 ;
1010 ; * DARKTERM '88 - PARTIAL *
1020 ; * EQUATES LIST *
1030 ;
1040 PGM =$87D ; PROGRAM START
1050 ;
1060 SCREEN =$CC00 ; SCREEN MEMORY
1070 RS232 =$3E00 ; BUFFERS @ ($3C00)
1080 MODLOD =$4500 ; MODEM FILES
1090 PROLOD =$3E00 ; PROTOCOL OVERLAY
1100 EXECED =$C400 ; OVERLAY AREA
1110 SAVBFS =$C400 ; SCREEN SWAP SAVE
1120 SAVBFC =$C800 ; COLOR SWAP SAVE
1130 FILMEM =$B000 ; MULTI-FILE BUFFER
1140 BUFFER =$4800 ; 31K BUFFER START
1150 ;
1160 PLOAD =$334 ; PARAMETERS START
1170 PARLEN =192 ; 192 BYTES RESERVED
1180 ;
1190 K =$400 ; FUNCTION KEY START
1200 ;
1210 ANSWER =MODLOD ; MODEM FILE JUMP
1220 DODIAL =MODLOD+3 ; TABLE ADDRS
1230 ONHOOK =MODLOD+6
1240 OFHOOK =MODLOD+9
1250 CARCHK =MODLOD+12
1260 CUSTOM =MODLOD+15
1270 HANGUP =MODLOD+18
1280 ;
1290 SEND1 =PROLOD ; PUNTER SEND 1
1300 RECV1 =PROLOD+3 ; PUNTER RECV 1
1310 SEND2 =PROLOD+6 ; PUNTER SEND 2
1320 RECV2 =PROLOD+9 ; PUNTER RECV 2
1330 XMODES =PROLOD ; XMODEM SEND
1340 XMODER =PROLOD+3 ; XMODEM RECV
1350 READY =PROLOD+12 ; PREPARE RS232
1360 OLDNEW =PROLOD+15 ; MULTI FILE ON
1370 NEWOLD =PROLOD+18 ; MULTI-FILE OFF
1380 ;
1390 BUFTOP =$C400 ; TOP OF 31K BUFFER
1400 ;
1410 ; * PARAMETERS *
1420 ;
1430 PARCHR =820 ; CHARACTER SET FILE
1440 PARKEY =836 ; FUNCTION KEY FILE
1450 PARMOD =852 ; MODEM FILE
1460 SAVC1 =868 ; SCREEN COLORS
1470 SAVC2 =869
1480 SAVC3 =870
1490 PROTO =871 ; PROTOCOL TYPE
1500 BLKSIZ =872 ; PUNTER BLOCK SIZE
1510 BAUD =873 ; BAUD RATE
1520 PDEV =875 ; PRINTER DEVICE
1530 PSEC =876 ; PRINTER SECOND ADDR
1540 ESCFLG =877 ; ESCAPE SEQUENCE FLAG
1550 CLATE =878 ; COLOR TRANSLATE FLAG
1560 XDELO =879 ; BUFFER XMIT DELAY
1570 XDEHI =880
1580 TSPACE =881 ; PRINT - TOP MARGIN
1590 BSPACE =882 ; - BOTTOM MARGIN
1600 MCC =883 ; RESERVED
1610 PLIN =884 ; LINES PER PAGE
1620 ESCLEN =885 ; ESCAPE SEQ LENGTH
1630 ESCLIN =886 ; ESCAPE SEQ BUFFER
1640 SBITS =918 ; STOP BITS
1650 PARITY =919 ; PARITY
1660 WRDLEN =920 ; WORD LENGTH
1670 BSPEED =921 ; BUFFER RATE FLAG
1680 DETECT =922 ; CARRIER DETECT FLAG
1690 NULLS =923 ; NULLS
1700 LINEF =924 ; LINEFEED STATUS
1710 HDELAY =925 ; HANGUP DELAY
1720 WDELAY =926 ; CARRIER WAIT DELAY
1730 DDELAY =927 ; PULSE DIAL SPEED
1740 PRELEN =929 ; AT PREFIX LENGTH
1750 PREFIX =930 ; AT PREFIX BUFFER
1760 CRCFLG =934 ; XMODEM CRC TYPE
1770 COMLOK =935 ; COMMAND MODE FLAG
1780 COLLOK =936 ; COLOR/ASCII FLAG
1790 SCRSUP =937 ; SCREEN INHIBIT
1800 MODSUP =938 ; MODEM INHIBIT
1810 CAPLOK =939 ; CAPS LOCK
1820 WRPLOK =940 ; WORD WRAP LOCK
1830 CWAVE =941 ; KEYCLICK WAVEFORM
1840 CFREQ =942 ; KEYCLICK FREQUENCY
1850 CLKFLG =943 ; KEYCLICK FLAG
1860 BWAVE =944 ; BELL WAVEFORM
1870 BFREQ =945 ; BELL FREQUENCY
1880 BELFLG =946 ; BELL ENABLE FLAG
1890 MULTYP =947 : MULTI-FILE PROTOCOL
1900 BMILL =948 ; BUFFER DISPLAY RATE
1910 V295 =949 ; BAUD TIMING VALUES
1920 V296 =950
1930 V299 =953
1940 V29A =954
1950 VTIML =957
1960 VTIMH =958
1970 ;
1980 ; * TERMINAL GLOBAL ROUTINES *
1990 ;
2000 IPRINT =PGM+3
2010 INLINE =IPRINT+3
2020 INKEY =INLINE+3
2030 BFREE =INKEY+3
2040 OUT =BFREE+3
2050 YESNO =OUT+3
2060 RESCUR =YESNO+3
2070 ALTMOD =RESCUR+3
2080 MILLI =ALTMOD+3
2090 CURSON =MILLI+3
2100 HEXDEC =CURSON+3
2110 ROPEN =HEXDEC+3
2120 WOPEN =ROPEN+3
2130 SENDOS =WOPEN+3
2140 EVAL1 =SENDOS+3
2150 EVAL2 =EVAL1+3
2160 INFO =EVAL2+3
2170 QOUT =INFO+3
2180 PAUSE =QOUT+3
2190 DOCLOS =PAUSE+3
2200 WAITR =DOCLOS+3
2210 FILEIN =WAITR+3
2220 HEXASC =FILEIN+3
2230 ADDIBP =HEXASC+3
2240 SUBIBP =ADDIBP+3
2250 USHIFT =SUBIBP+3
2260 DSHIFT =USHIFT+3
2270 QUOSCR =DSHIFT+3
2280 FNDSCR =QUOSCR+3
2290 CARPRS =FNDSCR+3
2300 VINPUT =CARPRS+3
2310 ;